home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 110 / EnigmaAmiga110CD.iso / software / varie / wordworth_upd701 / wordworth 7.01 update < prev    next >
Text File  |  1998-08-03  |  1KB  |  53 lines
  1. ; Script to update Wordworth 7 to Wordworth 7.01 - MJ & PB
  2.  
  3. echo "*NDigita Wordworth 7.01 Update"
  4. echo "============================*N"
  5. echo "This will update your copy of Wordworth 7 to version 7.01.*N"
  6.  
  7. ask "Do you want to continue (Y/N)?"
  8.  
  9. if warn
  10.     if not exists ENV:Wordworth/WwFonts
  11.         echo "*NERROR: Wordworth does not seem to be installed correctly."
  12.         echo "Re-install Wordworth 7, then run this update again."
  13.  
  14.         ask "*NPress Return to exit."
  15.         Quit
  16.     endIf
  17.  
  18.     cd >ENV:CurrentDir
  19.     type ENV:Wordworth/WwFonts >ENV:FontPath
  20.     cd "$FontPath"
  21.     cd /
  22.     cd >ENV:WwPath
  23.     cd "$CurrentDir"
  24.  
  25.     ; Copy the files
  26.     echo "*N0%       100%"
  27.    lhex "-qafw=$wwpath" x WWProg.lha
  28.     echo noline "######"
  29.    lhex "-qafw=$wwpath/WWFiles" x WWCore.lha
  30.     echo noline "###"
  31.    lhex "-qafw=$wwpath/Modules" x WWModules.lha
  32.     echo noline "###"
  33.  
  34.     ; Add a line to the core catalog file
  35.     if exists "$WwPath/catalogs/english"
  36.         echo noline "*N31, January 1998" >>"$WwPath/Catalogs/english/WwCore.catalog"
  37.     endif
  38.     if exists "$WwPath/catalogs/deutsch"
  39.         echo noline "*N31, Januar 1998" >>"$WwPath/Catalogs/deutsch/WwCore.catalog"
  40.     endif
  41.     if exists "$WwPath/catalogs/français"
  42.         echo noline "*N31, Janvier 1998" >>"$WwPath/Catalogs/français/WwCore.catalog"
  43.     endif
  44.  
  45.     echo "#"
  46. endif
  47.  
  48. unsetenv >NIL: CurrentDir
  49. unsetenv >NIL: FontPath
  50. unsetenv >NIL: WwPath
  51.  
  52. ask "*NPress Return to exit."
  53.